a. Vt chương trình =nnlt pascal Mô tả thuật toán sau Bước 1. S←1;n←0 Bước 2. Nếu s>=10;chuyển bước 4 Bước 3. N←n+2,s←s+n; quay bước 2 Bước 4 thông báo s và KT thuật toán b. khởi động phần mềm Free pascal soạn thảo lưu dịch chạy trương trình quan sát kết quả
Những câu hỏi liên quan
Giúp Tui với ạ(đang cần gấp)!!!! Cho mô tả thuật toán sau: Bước 1. S<--0;n<--0; bước2. Nếu n>4 thì chuyển đến bước 4. Bước3. N<--n+1;S<--S+n;quay lại bước2. Bước 4.thông báo gtri S. a)tính gtri S,n. b) vt chương trình (sử dụng vòng lặp For...to...do)
a: n=10
b: uses crt;
var i,s,n:integer;
begin
clrscr;
s:=0;
for i:=1 to 4 do s:=s+i;
write(s);
readln;
end.
Đúng 0
Bình luận (0)
Cho biết khi thực hiện thuật toán sau, máy tính sẽ thực hiện bao nhiêu vòng lặp?
Bước 1. S ← 16, n ← 0
Bước 2. Nếu S ≤ 10, chuyển tới bước 4.
Bước 3. n ← n + 3, S ← S – n và quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật toán.
A. 1
B. 2
C. 3
D. 4
Cho biết khi thực hiện thuật toán sau, máy tính sẽ thực hiện bao nhiêu vòng lặp?
Bước 1. S ← 18, n ← 0
Bước 2. Nếu S ≤ 10, chuyển tới bước 4.
Bước 3. n ← n + 3, S ← S – n và quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật toán.
A. 1
B. 2
C. 3
D. 4
Cho biết khi thực hiện thuật toán sau, máy tính sẽ thực hiện bao nhiêu vòng lặp?
Bước 1. S ← 12, n ← 0
Bước 2. Nếu S ≤ 10, chuyển tới bước 4.
Bước 3. n ← n + 3, S ← S – n và quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật toán.
A. 1
B. 2
C. 3
D. 4
Cho biết khi thực hiện thuật toán sau, máy tính sẽ thực hiện bao nhiêu vòng lặp?
Bước 1. S ← 14, n ← 0
Bước 2. Nếu S ≤ 10, chuyển tới bước 4.
Bước 3. n ← n + 3, S ← S – n và quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật toán.
A. 1
B. 2
C. 3
D. 4
Hãy tìm hiểu các thuật toán sau đây và cho biết khi thực hiện thuật toán, máy tính sẽ bao nhiêu vòng lặp? Khi kết thúc, giá trị của S bằng bao nhiêu? Viết chương trình Pascal thể hiện các thuật toán đó:
a) Thuật toán 1
Bước 1. S leftarrow 10, x leftarrow 0.5
Bước 2. Nếu S leq 5.2, chuyển tới bước 4.
Bước 3. S leftarrow S - x và quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật toán.
b) Thuật toán 2
Bước 1. S leftarrow 10, n leftarrow 0.
Bước 2. Nếu S ≥ 10, chuyển tới bước 4.
Bước...
Đọc tiếp
Hãy tìm hiểu các thuật toán sau đây và cho biết khi thực hiện thuật toán, máy tính sẽ bao nhiêu vòng lặp? Khi kết thúc, giá trị của S bằng bao nhiêu? Viết chương trình Pascal thể hiện các thuật toán đó:
a) Thuật toán 1
Bước 1. S \(\leftarrow\) 10, x \(\leftarrow\) 0.5
Bước 2. Nếu S \(\leq\) 5.2, chuyển tới bước 4.
Bước 3. S \(\leftarrow\) S - x và quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật toán.
b) Thuật toán 2
Bước 1. S \(\leftarrow\) 10, n \(\leftarrow\) 0.
Bước 2. Nếu S ≥ 10, chuyển tới bước 4.
Bước 3. n \(\leftarrow\) n + 3, S \(\leftarrow\) S - n quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật toán.
a)
- Máy thực hiện gồm 10 vòng lặp
- Khi kết thúc vòng lặp giá trị của S=5
- Chương trình :
Program hotrotinhoc;
var x,s:real;
begin
s:=10; x:=0.5;
while s>=5.2 do s:=s-x;
write(s:1:0);
readln
end.
b)
- Máy thực hiện gồm vô hạn vòng lặp
- Khi kết thúc vòng lặp giá trị của S không xác định
- Chương trình :
Program hotrotinhoc;
var n,s:byte;
begin
s:=10; n:=0;
while s<=10 do
begin
n:=n+3;
s:=s-n;
end;
write(s);
readln
end.
Đúng 1
Bình luận (0)
a)
- Máy thực hiện gồm 10 vòng lặp
- Khi kết thúc vòng lặp giá trị của S=5
- Chương trình :
Program hotrotinhoc;
var x,s:real;
begin
s:=10; x:=0.5;
while s>=5.2 do s:=s-x;
write(s:1:0);
readln
end.
b)
-không thực hiện lặp do điều kiện thoát lặp là s>=10 mà ban đầu s=10
-kết thúc,s=10
chương trình:
Program hotrotinhoc;
var n,s:byte;
begin
s:=10; n:=0;
while s<10 do
begin
n:=n+3;
s:=s-n;
end;
write(s);
readln
end.
Đúng 1
Bình luận (0)
Giải thích cách lm?
Câu 4: Cho biết khi thực hiện thuật toán sau, máy tính sẽ thực hiện bao nhiêu vòng lặp?
Bước 1. S ← 12, n ← 0
Bước 2. Nếu S ≤ 10, chuyển tới bước 4.
Bước 3. n ← n + 3, S ← S – n và quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật toán.
A. 1 B. 2 C. 3 D. 4
Câu 2: Cho thuật toán sauBước 1: Nß10; Bước 2: S f 0; i f 1, Bước 3: Nếu i N thì Thông báo S, kết thúc. Bước 4: S ! S + i; Bước 5: if i + 1, quay lại B3;a. Hãy điền giá trị tương ứng của i và S khi chạy thuật toán. i12345678910S b. Thuật toán trên dùng để giải quyết bài toán gì……………………………………………………………………………………………..Câu 3: Cho dãy A gồm N số nguyên a1, a2,…, aN. Xây dựng thuật toán tính tổng các số nguyên dương có trong dãy.+ Input:................................................
Đọc tiếp
Câu 2: Cho thuật toán sau
Bước 1: Nß10;
Bước 2: S f 0; i f 1,
Bước 3: Nếu i > N thì Thông báo S, kết thúc.
Bước 4: S ! S + i;
Bước 5: if i + 1, quay lại B3;
a. Hãy điền giá trị tương ứng của i và S khi chạy thuật toán.
i | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 |
S |
|
|
|
|
|
|
|
|
|
|
b. Thuật toán trên dùng để giải quyết bài toán gì
……………………………………………………………………………………………..
Câu 3: Cho dãy A gồm N số nguyên a1, a2,…, aN. Xây dựng thuật toán tính tổng các số nguyên dương có trong dãy.
+ Input:...............................................................................................................................
+ Output: ...........................................................................................................................
+ Thuật toán:
Câu 3:
#include <bits/stdc++.h>
using namespace std;
long long n,i,x,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x>0) t=t+x;
}
cout<<t;
return 0;
}
Đúng 0
Bình luận (0)
Viết chương trình Pascal cho hai thuật toán sau: Thuật toán 1: Bước 1: T:=0; n:=0 Bước 2: Nếu T >20 chuyển về bước 4 Bước 3: n:= n+2; T := T+n; Quay lại bước 2 Bước 4: Thông Bảo T; Kết thúc thuật toán
đen như zại ai mè giải đựt ạ, khum nhìn thấy chữ gì lun ạ
Đúng 0
Bình luận (0)
uses crt;
var t,n:integer;
begin
clrscr;
t:=0;
n:=0;
while t<=20 do
begin
n:=n+2;
t:=t+n;
end;
writeln(t);
readln;
end.
Đúng 0
Bình luận (0)